home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
TPUG - Toronto PET Users Group
/
TPUG Users Group CD
/
TPUG Users Group CD.iso
/
C64
/
T-TPUG Old Monthly Disks
/
(c)td.d64
/
classical gas.c
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2007-02-04
|
14KB
|
565 lines
100 REM CLASSICAL GAS
101 REM MUSIC BY MASON WILLIAMS
102 REM TRANSCRIBED FOR C-64 BY R.KEAYS
103 REM SUMMER OF 84
104 REM DRIVER-AFTER BUTTERFIELD
105 PRINT"[147] CONCERT IN PROGRESS!"
108 FORVO=1TO15:POKE54296,VO:NEXTVO
110 L1=54272:L2=54279:L3=54286
120 H1=L1+1:H2=L2+1:H3=L3+1
130 V1=L1+4:V2=L2+4:V3=L3+4
145 P1=L1+3:P2=L2+3:P3=L3+3
147 LP=P1-1:MP=P2-1:NP=P3-1
150 POKEV1+1,25:POKEV1+2,32:REM A=1*16:D=9
160 POKEV2+1,25:POKEV2+2,32:REM S=2*16:R=0
170 POKEV3+1,40:POKEV3+2,90:REM S=5*16:R=10
180 T=TI:F=20
190 POKEV1,64:POKEV2,64:POKEV3,64:REM PULSE WAVEFORM
200 POKEP1,8:POKEP2,8:POKEP3,8:REM HI PULSE
205 POKELP,0:POKEMP,0:POKENP,0:REM LO PULSE
210 READS:IFS=0GOTO290
220 READX1,Y1,X2,Y2,X3,Y3
230 IFX1THENPOKEH1,X1:POKEL1,Y1:POKEV1,65
240 IFX2THENPOKEH2,X2:POKEL2,Y2:POKEV2,65
250 IFX3THENPOKEH3,X3:POKEL3,Y3:POKEV3,65
260 T=T+S/10*F
270 IFT>TIGOTO270
280 GOTO190
290 FORJ=L1 TO 54295:POKE J,0:NEXT J:FORVO=15TO1STEP-1:POKE54296,VO:NEXT:END
300 REM DURATION,HI1,LO1,...,HI3,LO3
8000 REM MUSIC DATA STARTS HERE
8001 DATA60,0,0,0,0,0,0:REM PAUSE BEFORE START
8002 DATA10,34,75,21,154,14,107
8006 DATA10,28,214,0,0,0,0
8010 DATA10,34,75,0,0,0,0
8014 DATA30,32,94,19,63,12,216
8018 DATA10,32,94,25,177,10,205
8022 DATA10,28,214,22,227,0,0
8026 DATA10,25,177,21,154,0,0
8030 DATA30,28,214,17,37,7,53
8034 DATA10,34,75,21,154,14,107
8038 DATA10,28,214,0,0,0,0
8042 DATA10,34,75,0,0,0,0
8046 DATA30,32,94,19,63,12,216
8050 DATA10,32,94,25,177,10,205
8054 DATA10,28,214,22,227,0,0
8058 DATA10,25,177,21,154,0,0
8062 DATA04,14,107,0,0,0,0
8066 DATA04,17,37,0,0,0,0
8070 DATA04,21,154,0,0,0,0
8074 DATA10,28,214,0,0,0,0
8078 DATA4,0,0,0,0,0,0
8082 DATA4,25,177,0,0,0,0
8086 DATA4,32,94,0,0,0,0
8090 DATA4,0,0,0,0,0,0
8094 DATA4,28,214,0,0,0,0
8098 DATA4,34,75,0,0,0,0
8102 DATA4,0,0,0,0,0,0
8106 DATA4,25,177,0,0,0,0
8110 DATA4,38,126,0,0,0,0
8114 DATA15,43,52,21,154,8,147
8118 DATA05,38,126,0,0,0,0
8122 DATA10,34,75,21,154,14,107
8126 DATA10,38,126,0,0,0,0
8130 DATA05,21,154,10,205,0,0
8134 DATA05,34,75,0,0,0,0
8138 DATA10,32,94,27,56,0,0
8146 DATA05,34,75,28,214,14,107
8150 DATA05,32,94,21,154,0,0
8154 DATA05,34,75,28,214,0,0
8158 DATA10,28,214,21,154,17,37
8162 DATA10,34,75,21,154,0,0
8166 DATA20,32,94,19,63,0,0
8174 DATA15,0,0,12,32,0,0
8178 DATA10,0,0,10,205,0,0
8182 DATA05,32,94,25,177,10,205
8186 DATA05,28,214,0,0,0,0
8190 DATA05,25,177,0,0,0,0
8194 DATA10,28,214,10,205,0,0
8198 DATA10,32,94,21,154,0,0
8202 DATA20,28,214,17,37,0,0
8206 DATA15,0,0,7,53,0,0
8210 DATA10,0,0,10,205,0,0
8218 DATA05,34,75,28,214,14,107
8222 DATA05,32,94,21,154,0,0
8226 DATA05,34,75,28,214,0,0
8230 DATA10,28,214,21,154,17,37
8234 DATA10,34,75,21,154,0,0
8238 DATA20,32,94,19,63,0,0
8242 DATA15,0,0,12,32,0,0
8246 DATA10,0,0,10,205,0,0
8254 DATA05,32,94,25,177,10,205
8258 DATA05,28,214,0,0,0,0
8262 DATA05,25,177,0,0,0,0
8266 DATA10,28,214,10,205,0,0
8270 DATA10,32,94,21,154,0,0
8274 DATA20,28,214,17,37,0,0
8278 DATA15,0,0,7,53,0,0
8282 DATA10,0,0,10,205,0,0
8283 DATA05,34,75,28,214,14,107
8284 DATA05,32,94,21,154,0,0
8285 DATA05,34,75,28,214,0,0
8286 DATA10,28,214,21,154,17,37
8287 DATA10,34,75,21,154,0,0
8288 DATA20,32,94,19,63,0,0
8289 DATA15,0,0,12,32,0,0
8290 DATA10,0,0,10,205,0,0
8291 DATA05,32,94,25,177,10,205
8292 DATA05,28,214,0,0,0,0
8293 DATA05,25,177,0,0,0,0
8294 DATA10,28,214,10,205,0,0
8295 DATA10,32,94,21,154,0,0
8296 DATA20,28,214,17,37,0,0
8297 DATA15,0,0,7,53,0,0
8298 DATA10,0,0,10,205,0,0
8299 DATA05,34,75,28,214,14,107
8300 DATA05,32,94,21,154,0,0
8301 DATA05,34,75,28,214,0,0
8302 DATA10,28,214,21,154,17,37
8303 DATA10,34,75,21,154,0,0
8304 DATA20,32,94,19,63,0,0
8305 DATA15,0,0,12,32,0,0
8306 DATA10,0,0,10,205,0,0
8307 DATA05,32,94,25,177,10,205
8308 DATA05,28,214,0,0,0,0
8309 DATA05,25,177,0,0,0,0
8310 DATA10,28,214,10,205,0,0
8311 DATA10,32,94,21,154,0,0
8312 DATA10,28,214,17,37,7,53
8314 DATA05,21,154,0,0,0,0
8318 DATA10,32,94,19,63,0,0
8322 DATA05,25,177,0,0,0,0
8326 DATA05,32,94,0,0,0,0
8330 DATA10,34,75,21,154,0,0
8334 DATA05,28,214,0,0,0,0
8338 DATA10,34,75,0,0,0,0
8342 DATA05,25,177,19,63,8,23
8346 DATA10,38,126,0,0,0,0
8350 DATA05,25,177,0,0,0,0
8354 DATA15,43,52,25,177,8,147
8358 DATA05,38,126,0,0,0,0
8362 DATA10,34,75,21,154,7,53
8366 DATA10,38,126,21,154,7,53
8370 DATA05,21,154,10,205,5,103
8374 DATA05,34,75,0,0,0,0
8378 DATA10,32,94,10,205,5,103
8382 DATA15,28,214,17,37,5,185
8386 DATA05,25,177,0,0,0,0
8390 DATA05,28,214,19,63,5,103
8394 DATA10,28,214,19,63,5,103
8398 DATA05,25,177,0,0,0,0
8399 DATA05,28,214,17,37,7,53
8400 DATA05,21,154,0,0,0,0
8401 DATA05,32,94,19,63,6,108
8402 DATA05,25,177,0,0,0,0
8403 DATA05,34,75,21,154,7,53
8404 DATA05,28,214,0,0,0,0
8405 DATA05,38,126,0,0,8,23
8406 DATA05,25,177,0,0,0,0
8407 DATA05,43,52,34,75,8,147
8408 DATA05,25,177,0,0,0,0
8409 DATA05,45,198,34,75,11,114
8410 DATA05,28,214,0,0,0,0
8411 DATA05,48,127,38,126,9,159
8412 DATA05,28,214,0,0,0,0
8413 DATA05,51,97,38,126,12,216
8414 DATA05,32,94,0,0,0,0
8415 DATA05,54,111,19,63,10,205
8416 DATA05,43,52,0,0,0,0
8417 DATA05,57,172,19,63,10,205
8418 DATA05,43,52,0,0,0,0
8419 DATA05,64,188,19,63,10,205
8420 DATA15,57,172,34,75,14,107
8421 DATA15,48,127,28,214,9,159
8422 DATA15,51,97,32,94,12,216
8423 DATA15,43,52,25,177,8,147
8424 DATA15,45,198,28,214,11,114
8425 DATA05,38,126,22,227,7,163
8426 DATA05,0,0,0,0,0,0
8427 DATA05,14,107,11,114,9,159
8428 DATA10,22,227,0,0,0,0
8429 DATA10,28,214,0,0,0,0
8430 DATA10,38,126,0,0,0,0
8431 DATA10,43,52,11,114,9,159
8432 DATA10,38,126,0,0,0,0
8433 DATA05,28,214,0,0,0,0
8434 DATA05,22,227,0,0,0,0
8435 DATA05,28,214,0,0,0,0
8436 DATA05,38,126,0,0,0,0
8437 DATA05,25,177,0,0,0,0
8438 DATA05,14,107,12,32,9,159
8439 DATA10,24,63,0,0,0,0
8440 DATA05,28,214,0,0,0,0
8441 DATA05,28,214,0,0,0,0
8442 DATA10,38,126,0,0,0,0
8443 DATA10,43,52,12,32,9,159
8444 DATA10,38,126,0,0,0,0
8445 DATA05,28,214,0,0,0,0
8446 DATA05,24,63,0,0,0,0
8447 DATA05,28,214,0,0,0,0
8448 DATA05,38,126,0,0,0,0
8449 DATA05,25,177,0,0,0,0
8450 DATA05,7,53,0,0,0,0
8451 DATA05,10,205,0,0,0,0
8452 DATA05,18,42,0,0,0,0
8453 DATA05,28,214,0,0,0,0
8454 DATA40,36,85,28,214,10,205
8455 REM END CODA
8461 DATA05,28,214,17,37,7,53
8462 DATA05,21,154,0,0,0,0
8522 DATA05,28,214,0,0,0,0
8582 DATA10,32,94,19,63,0,0
8642 DATA05,25,177,0,0,0,0
8702 DATA05,32,94,0,0,0,0
8762 DATA10,34,75,21,154,0,0
8822 DATA05,28,214,0,0,0,0
8882 DATA10,34,75,0,0,0,0
8942 DATA05,25,177,19,63,8,23
9002 DATA10,38,126,0,0,0,0
9062 DATA05,25,177,0,0,0,0
9122 DATA05,43,52,12,216,8,147
9182 DATA05,34,75,0,0,0,0
9242 DATA05,25,177,0,0,0,0
9302 DATA05,45,198,11,114,5,185
9362 DATA05,34,75,0,0,0,0
9422 DATA05,28,214,0,0,0,0
9482 DATA05,48,127,9,159,0,0
9542 DATA05,38,126,0,0,0,0
9602 DATA05,34,75,0,0,0,0
9662 DATA05,51,97,12,216,0,0
9722 DATA05,38,126,0,0,0,0
9782 DATA05,32,94,0,0,0,0
9842 DATA05,54,111,19,63,10,205
9902 DATA05,43,52,0,0,0,0
9962 DATA05,57,172,19,63,10,205
10022 DATA05,43,52,0,0,0,0
10082 DATA05,64,188,19,63,10,205
10142 DATA05,43,52,0,0,0,0
10202 DATA05,68,149,34,75,7,53
10262 DATA05,64,188,0,0,0,0
10322 DATA05,57,172,0,0,7,53
10382 DATA10,51,97,34,75,7,53
10442 DATA10,57,172,0,0,0,0
10502 DATA15,48,127,28,214,14,107
10562 DATA05,57,172,0,0,0,0
10622 DATA10,48,127,9,159,0,0
10682 DATA05,57,172,9,159,0,0
10742 DATA15,48,127,0,0,0,0
10802 DATA05,68,149,34,75,7,53
10862 DATA05,64,188,34,75,0,0
10922 DATA05,57,172,34,75,7,53
10982 DATA10,51,97,34,75,7,53
11042 DATA10,57,172,0,0,0,0
11102 DATA10,48,127,28,214,14,107
11162 DATA10,51,97,0,0,0,0
11222 DATA05,57,172,0,0,0,0
11282 DATA10,51,97,0,0,9,159
11342 DATA10,57,172,0,0,9,159
11402 DATA05,68,149,34,75,7,53
11462 DATA05,64,188,0,0,0,0
11522 DATA05,57,172,34,75,7,53
11582 DATA10,51,97,34,75,0,0
11642 DATA10,57,172,0,0,0,0
11702 DATA15,48,127,38,126,14,107
11762 DATA05,68,149,9,159,0,0
11822 DATA05,57,172,0,0,0,0
11882 DATA10,51,97,14,107,9,159
11942 DATA05,57,172,0,0,9,159
12002 DATA15,51,97,32,94,12,216
12062 DATA15,43,52,25,177,8,147
12122 DATA15,45,198,28,214,11,114
12182 DATA10,38,126,22,227,7,163
12242 DATA05,0,0,14,107,7,53
12302 DATA15,43,52,28,214,14,107
12362 DATA05,43,52,28,214,14,107
12422 DATA15,43,52,28,214,14,107
12482 DATA10,43,52,28,214,14,107
12542 DATA05,7,53,0,0,0,0
12602 DATA05,11,114,0,0,0,0
12662 DATA05,14,107,0,0,0,0
12722 DATA20,43,52,28,214,21,154
12782 DATA05,22,227,13,156,9,21
12842 DATA10,22,227,13,156,9,21
12902 DATA10,13,156,0,0,6,206
12962 DATA05,15,70,0,0,7,163
13022 DATA10,18,42,0,0,9,21
13082 DATA10,24,63,18,42,6,206
13142 DATA10,24,63,18,42,6,206
13202 DATA20,22,227,18,42,9,21
13262 DATA05,22,227,13,156,9,21
13322 DATA10,22,227,13,156,7,163
13382 DATA10,13,156,0,0,6,206
13442 DATA05,15,70,0,0,7,163
13502 DATA10,18,42,0,0,9,21
13562 DATA10,24,63,15,70,6,206
13622 DATA10,24,63,15,70,6,206
13682 DATA05,22,227,18,42,9,21
13742 DATA05,14,107,0,0,0,0
13802 DATA05,18,42,0,0,0,0
13862 DATA05,22,227,0,0,0,0
13922 DATA05,27,56,16,47,10,205
13982 DATA10,27,56,16,47,10,205
14042 DATA10,16,47,0,0,8,23
14102 DATA05,18,42,0,0,9,21
14162 DATA10,21,154,0,0,10,205
14222 DATA10,28,214,21,154,8,23
14282 DATA10,28,214,21,154,8,23
14342 DATA10,27,56,19,63,10,205
14402 DATA05,16,47,0,0,0,0
14462 DATA05,18,42,0,0,0,0
14522 DATA05,27,56,16,47,10,205
14582 DATA10,27,56,16,47,10,205
14642 DATA10,16,47,0,0,8,23
14702 DATA05,18,42,0,0,9,21
14762 DATA10,21,154,0,0,10,205
14822 DATA10,28,214,18,42,8,23
14882 DATA10,28,214,18,42,8,23
14942 DATA05,27,56,16,47,10,205
15002 DATA05,32,94,0,0,0,0
15062 DATA05,54,111,0,0,0,0
15122 DATA15,51,97,32,94,12,216
15182 DATA15,43,52,25,177,8,147
15242 DATA15,45,198,28,214,11,114
15302 DATA10,38,126,22,227,7,163
15362 DATA05,0,0,14,107,7,53
15422 DATA15,43,52,28,214,14,107
15482 DATA15,43,52,28,214,14,107
15542 DATA15,43,52,28,214,14,107
15602 DATA05,43,52,28,214,14,107
15662 DATA05,0,0,0,0,0,0
15722 DATA05,14,107,0,0,0,0
15782 DATA10,22,227,0,0,0,0
15842 DATA10,28,214,0,0,0,0
15902 DATA10,38,126,0,0,0,0
15962 DATA10,43,52,0,0,0,0
16022 DATA10,38,126,0,0,0,0
16082 DATA05,28,214,0,0,0,0
16142 DATA05,22,227,0,0,0,0
16202 DATA05,28,214,0,0,0,0
16262 DATA05,38,126,0,0,0,0
16322 DATA05,25,177,0,0,0,0
16382 DATA03,32,94,0,0,0,0
16442 DATA03,34,75,0,0,0,0
16502 DATA05,32,94,0,0,0,0
16562 DATA05,34,75,0,0,0,0
16622 DATA10,28,214,0,0,0,0
16682 DATA05,21,154,0,0,0,0
16742 DATA05,28,214,0,0,0,0
16802 DATA15,38,126,0,0,0,0
16862 DATA15,34,75,0,0,0,0
16922 DATA15,32,94,0,0,0,0
16982 DATA03,32,94,0,0,0,0
17042 DATA03,34,75,0,0,0,0
17102 DATA05,32,94,0,0,0,0
17162 DATA15,28,214,0,0,0,0
17222 DATA05,21,154,0,0,0,0
17282 DATA05,28,214,0,0,0,0
17342 DATA15,32,94,14,107,0,0
17402 DATA15,28,214,14,107,0,0
17462 DATA15,25,177,0,0,0,0
17522 DATA03,32,94,14,107,0,0
17582 DATA03,34,75,0,0,0,0
17642 DATA05,32,94,0,0,0,0
17702 DATA05,34,75,14,107,0,0
17762 DATA10,28,214,14,107,0,0
17822 DATA05,21,154,0,0,0,0
17882 DATA05,28,214,0,0,0,0
17942 DATA15,32,94,14,107,0,0
18002 DATA15,34,75,14,107,0,0
18062 DATA15,38,126,0,0,0,0
18122 DATA05,43,52,14,107,7,53
18182 DATA05,34,75,0,0,0,0
18242 DATA05,43,52,0,0,0,0
18302 DATA05,38,126,0,0,7,53
18362 DATA05,32,94,0,0,0,0
18422 DATA05,38,126,0,0,0,0
18482 DATA05,34,75,0,0,7,53
18542 DATA05,28,214,0,0,0,0
18602 DATA05,34,75,14,107,0,0
18662 DATA05,32,94,0,0,7,53
18722 DATA05,25,177,0,0,0,0
18782 DATA05,32,94,0,0,0,0
18842 DATA05,28,214,12,216,6,108
18902 DATA05,32,94,0,0,0,0
18962 DATA05,34,75,0,0,0,0
19022 DATA05,38,126,0,0,0,0
19082 DATA05,43,52,12,216,8,147
19142 DATA05,38,126,0,0,0,0
19202 DATA05,43,52,0,0,0,0
19262 DATA10,34,75,0,0,8,147
19322 DATA05,25,177,0,0,0,0
19382 DATA05,34,75,0,0,0,0
19442 DATA10,32,94,12,216,8,23
19502 DATA05,25,177,0,0,0,0
19562 DATA05,38,126,0,0,0,0
19622 DATA05,25,177,0,0,0,0
19682 DATA05,45,198,0,0,8,23
19742 DATA05,43,52,0,0,0,0
19802 DATA05,38,126,0,0,8,23
19862 DATA05,32,94,0,0,0,0
19922 DATA05,43,52,10,205,7,53
19982 DATA05,38,126,0,0,0,0
20042 DATA05,43,52,0,0,0,0
20102 DATA10,34,75,0,0,7,53
20162 DATA05,28,214,0,0,0,0
20222 DATA05,34,75,0,0,0,0
20282 DATA10,32,94,11,114,6,108
20342 DATA05,25,177,0,0,0,0
20402 DATA05,38,126,0,0,0,0
20462 DATA05,32,94,0,0,0,0
20522 DATA05,45,198,0,0,6,108
20582 DATA05,43,52,0,0,0,0
20642 DATA05,38,126,0,0,6,108
20702 DATA05,32,94,0,0,0,0
20762 DATA05,43,52,12,216,8,147
20822 DATA05,38,126,0,0,0,0
20882 DATA05,43,52,0,0,0,0
20942 DATA10,34,75,0,0,8,147
21002 DATA05,25,177,0,0,0,0
21062 DATA05,34,75,0,0,0,0
21122 DATA10,32,94,12,216,8,23
21182 DATA05,25,177,0,0,0,0
21242 DATA05,38,126,0,0,0,0
21302 DATA05,43,52,0,0,0,0
21362 DATA05,45,198,0,0,8,23
21422 DATA05,43,52,0,0,0,0
21482 DATA05,38,126,0,0,8,23
21542 DATA05,32,94,0,0,0,0
21602 DATA05,43,52,10,205,7,53
21662 DATA05,38,126,0,0,0,0
21722 DATA05,43,52,0,0,0,0
21782 DATA10,34,75,0,0,7,53
21842 DATA05,28,214,0,0,0,0
21902 DATA05,34,75,0,0,0,0
21962 DATA40,32,94,19,63,6,108
22022 DATA05,0,0,0,0,6,16
22082 DATA10,0,0,0,0,6,16
22142 DATA10,0,0,0,0,5,103
22202 DATA05,32,94,25,177,10,205
22262 DATA05,28,214,0,0,0,0
22322 DATA05,25,177,0,0,0,0
22382 DATA15,28,214,0,0,10,205
22442 DATA10,32,94,21,154,0,0
22502 DATA10,28,214,17,37,7,53
22562 DATA05,21,154,0,0,0,0
22622 DATA05,32,94,25,177,6,108
22682 DATA05,19,63,0,0,0,0
22742 DATA05,34,75,28,214,7,53
22802 DATA05,21,154,0,0,0,0
22862 DATA05,38,126,25,177,8,23
22922 DATA05,19,63,0,0,0,0
22982 DATA05,43,52,34,75,8,147
23042 DATA05,25,177,0,0,0,0
23102 DATA05,45,198,34,75,11,114
23162 DATA05,28,214,0,0,0,0
23222 DATA05,48,127,38,126,9,159
23282 DATA05,28,214,0,0,0,0
23342 DATA05,51,97,38,126,12,216
23402 DATA05,32,94,0,0,0,0
23462 DATA05,54,111,21,154,10,205
23522 DATA05,32,94,0,0,0,0
23582 DATA05,57,172,38,126,10,205
23642 DATA05,32,94,0,0,0,0
23702 DATA05,64,188,21,154,10,205
23762 DATA05,32,94,0,0,0,0
23822 DATA05,68,149,34,75,7,53
23882 DATA05,64,188,0,0,0,0
23942 DATA05,57,172,34,75,7,53
24002 DATA10,51,97,34,75,14,107
24062 DATA10,57,172,0,0,0,0
24122 DATA10,48,127,28,214,14,107
24182 DATA05,57,172,0,0,0,0
24242 DATA10,48,127,0,0,9,159
24302 DATA05,57,172,0,0,9,159
24362 DATA15,48,127,0,0,14,107
24422 DATA05,68,149,34,75,7,53
24482 DATA05,64,188,0,0,0,0
24542 DATA05,57,172,34,75,7,53
24602 DATA10,51,97,34,75,14,107
24662 DATA10,57,172,0,0,0,0
24722 DATA10,48,127,28,214,14,107
24782 DATA10,51,97,0,0,0,0
24842 DATA05,57,172,0,0,0,0
24902 DATA10,51,97,0,0,9,159
24962 DATA10,57,172,0,0,9,159
25022 DATA05,68,149,34,75,7,53
25082 DATA05,64,188,0,0,0,0
25142 DATA05,57,172,34,75,7,53
25202 DATA10,25,177,34,75,7,53
25262 DATA10,28,214,0,0,0,0
25322 DATA15,48,127,38,126,14,107
25382 DATA05,68,149,38,126,9,159
25442 DATA05,57,172,0,0,0,0
25502 DATA10,51,97,38,126,9,159
25562 DATA05,57,172,0,0,9,159
25622 DATA15,51,97,32,94,12,216
25682 DATA15,43,52,25,177,8,147
25742 DATA15,45,198,28,214,11,114
25802 DATA10,38,126,22,227,7,163
25862 DATA05,0,0,14,107,7,53
25922 DATA15,43,52,28,214,14,107
25982 DATA15,43,52,28,214,14,107
26042 DATA15,43,52,28,214,14,107
26102 DATA10,43,52,28,214,14,107
26162 DATA40,43,52,21,154,7,53
26222 DATA05,28,214,17,37,7,53
26282 DATA05,21,154,0,0,0,0
26342 DATA05,32,94,19,63,6,108
26402 DATA05,25,177,0,0,0,0
26462 DATA05,34,75,21,154,7,53
26522 DATA05,28,214,0,0,0,0
26582 DATA05,38,126,0,0,8,23
26642 DATA05,25,177,0,0,0,0
26702 DATA05,43,52,34,75,8,147
26762 DATA05,25,177,0,0,0,0
26822 DATA05,45,198,34,75,11,114
26882 DATA05,28,214,0,0,0,0
26942 DATA05,48,127,38,126,9,159
27002 DATA05,28,214,0,0,0,0
27062 DATA05,51,97,38,126,12,216
27122 DATA05,32,94,0,0,0,0
27182 DATA05,54,111,19,63,10,205
27242 DATA05,43,52,0,0,0,0
27302 DATA05,57,172,19,63,10,205
27362 DATA05,43,52,0,0,0,0
27422 DATA05,64,188,19,63,10,205
27482 DATA15,57,172,34,75,14,107
27542 DATA15,48,127,28,214,9,159
27602 DATA15,51,97,32,94,12,216
27662 DATA15,43,52,25,177,8,147
27722 DATA15,45,198,28,214,11,114
27782 DATA05,38,126,22,227,7,163
27842 DATA05,0,0,0,0,0,0
27902 DATA05,14,107,11,114,9,159
27962 DATA10,22,227,0,0,0,0
28022 DATA10,28,214,0,0,0,0
28082 DATA10,38,126,0,0,0,0
28142 DATA10,43,52,11,114,9,159
28202 DATA10,38,126,0,0,0,0
28262 DATA05,28,214,0,0,0,0
28322 DATA05,22,227,0,0,0,0
28382 DATA05,28,214,0,0,0,0
28442 DATA05,38,126,0,0,0,0
28502 DATA05,25,177,0,0,0,0
28562 DATA05,14,107,12,32,9,159
28622 DATA10,24,63,0,0,0,0
28682 DATA05,28,214,0,0,0,0
28742 DATA05,28,214,0,0,0,0
28802 DATA10,38,126,0,0,0,0
28862 DATA10,43,52,12,32,9,159
28922 DATA10,38,126,0,0,0,0
28982 DATA05,28,214,0,0,0,0
29042 DATA05,24,63,0,0,0,0
29102 DATA05,28,214,0,0,0,0
29162 DATA05,38,126,0,0,0,0
29222 DATA05,25,177,0,0,0,0
29282 DATA05,7,53,0,0,0,0
29342 DATA05,10,205,0,0,0,0
29402 DATA05,18,42,0,0,0,0
29462 DATA05,28,214,0,0,0,0
29522 DATA40,36,85,28,214,10,205
29582 DATA40,0,0,0,0,0,0
29642 DATA0:REM STOP THE MUSIC
29702 :
29762 :